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TRANSITION = 0 
CYCLES = 0 
CYCLES_TEMP = 0 
CLOCK = 2e6 
FOR (n=2; n<=DATA; n++) 

IF((SS[n] ==1)&& (SS[n-1]==1)) 

CYCLES_TEMP = CYCLES_TEMP +1 
CYCLES = CYCLES +1 
IF (SLIN [n-1] != SLIN[n]) 

TRANSITION = TRANSITION + 1 
CYCLES_TEMP = 1 

ELSE 

IF (TRANSITION == 0) 

CYCLES = 0 
CYCLES_TEMP = 0 

ELSE 

ELSE 

CYCLES = CYCLES - CYCLES.TEMP 
IF (CYCLES <= 0) 

CYCLES = 1 

ELSE 

FREQUENCY_ESTIMATE = (TRANSITION - 1) * CLOCK / (CYCLES * 2) 
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FOR (n = 2 ; N <= DATA ; n++) 

IF((SS[n]==1)&&(SS[n-1]==1)) 

IF ((SLIN_Q[n-1] != SLIN_Q[n]) && SLIN_Q[n] == 1)) 
SLOPE[n] = SUN_l[n] 
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